From: Richard M. Stallman Date: Fri, 14 May 1993 03:57:45 +0000 (+0000) Subject: (vc-revert-buffer1): Don't assume that compilation-error-list X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96286 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=6fb6ab11e162b9ad21fd1c358dd67f3c0378700c;p=emacs.git (vc-revert-buffer1): Don't assume that compilation-error-list is a list; it might be t. --- diff --git a/lisp/vc.el b/lisp/vc.el index 2b7df01e99a..7f17c3cb007 100644 --- a/lisp/vc.el +++ b/lisp/vc.el @@ -289,7 +289,7 @@ the master name of FILE; this is appended to an optional list of FLAGS." compilation-old-error-list compilation-error-list)) (buffer-error-marked-p nil)) - (while (and errors + (while (and (consp errors) (not buffer-error-marked-p)) (and (markerp (cdr (car errors))) (eq buffer